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inSNTIFICATlON 

A-  Title:  Flexowrlter  Paper  Tape  to  Core  Corrector  Routine  (SFLXLOD) 
Ident  16c,  Mod  AA 

B.  Author:  R.  C.  Vlse^  System  Development  Corporation, 

15  February  1963 


PURPOSE 

SFUCLOD  is  a  16OA  program  \dilch  will  accept  a  special  format  paper  tape 
and  make  corrections  to  core.  The  program  exists  on  a  bl-octed  tape  smd 
will  operate  Independent  of  Its  position  in  memory. 

USAOE 

A.  Operation 

SFLXLOD  Is  loaded  from  a  bl>octal  tape  Into  any  bank  of  the  l60A>  The 
program  may  be  loaded  into  any  location  (provided  of  course,  there  Is 
sufficient  room  for  it  to  operate  -  l620  cells).  To  Initiate  the  pro¬ 
gram,  load  the  input  tape  In  the  reader,  set  the  P-Reglster  to  the 
starting  location  of  SFUCLOD  and  run.  After  loading  all  corrections 
from  the  input  tape  the  program  will  halt. 

B.  Program  Halts 

1.  SFLXLOD  +  ^2q  -  Illegal  bank  number  (b>3)* 

2.  SFLXLOD  -«■  760  -  Space  code  (O^)  encountered  >riiere  not  expected. 

3.  SFLXLOD  +1020  -  Stop  code  (3^)  encountered. 

4.  SFLXLOD  +1620  -  Ron-Octal  clmracter  in  a  corrector  field. 


All  halts  are  non-recoverable . 
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C.  Input  Format 

The  input  to  SPDCLOD  Is  a  paper  tape  containing  corrections  to  core. 
The  tape  may  be  produced  by  a  flexowriter,  or  the  program  3THEP. 


as  follows: 


The  format  of  the  tape  is 
CR 

SPACE 

Bank  number 
Loading  Address 
SPACE 

Correction  1 
SPACE 

Correction  2 
SPACE 


Carriage  Return  (*+50 ) 
Space  (o4) 

Beuik  number  (0-3) 

First  address  (0000-7777) 
Space  (oU) 
k  octal  digits 
Space  (oU) 

4  octal  digits 
Space  (04) 


Correction  N 
CR 

SPACE 

Bank  number 
Loading  address 
etc. 


METHOD 

The  input  paper  tape  is  read  one  character  at  a  time  and  the  characters 
are  examined.  If  the  character  is  a  ceurriace  return,  a  cheu:«cter  is  skipped 
and  the  next  character  is  converted  jus  the  loading  bank  and  the  following 
four  characters  as  the  octal  loading  address.  The  next  character  is  skipped 
and  the  succeeding  four  characters  are  converted  as  an  octal  number  and  de¬ 
posited  into  memory  in  the  btunk  specified  and  beginning  at  the  address  speci¬ 
fied.  The  loading  address  is  increased  by  one  after  each  deposit.  This 
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process  continues  until  smother  csurrlage  return  is  encountered  In  vhlch 
case  the  process  is  restarted  or  until  a  space  or  stop  code  tenninates  the 
process.  A  77  code  Is  Ignored  and  smother  character  processed. 

BESTHICTIONS 


A.  Only  bsmks  0,  1,  Z,  3  nay  he  set. 

B.  Cell  7777  nay  he  set  only  sm  the  first  loeullng  stddress,  not  in  a  se¬ 
quence  . 


C.  ^e  tape  must  have  only  Flex  coded  octed  numbers  for  hsmk  number, 
loading  address,  and  coi'rections . 


1.  Legal  Digits  sure  as  follovs; 


Number  Coded  Number 


0 

1 

2 

3 

k 

5 

6 
7 


56 

74 

70 

64 

62 

66 

72 

60 


D.  The  paper  tape  reader  must  be  on  the  normcU.  channel. 


TIMING 


The  timing  of  the  program  is  dependent  upon  the  speed  of  the  paper  tape 
reader. 
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STORAGE 

SFLXLOD  occupies 
in  the  16OA. 

TRANSFER  FUNCTION 

Area 

DEPI 

START 

ASETl 

ASET3 

INCON 

INCON+1 

ICl 

IC2 

ASETl 

INCON3 


A- 


l6iSg  cells.  The  program  will  operate  in  emy  position 


Operation 

Set  up  to  restore  indirect  setting  after  deposit. 

Read  paper  tape  until  non- zero  frame.  Go  to  INCON+1. 

Set  indirect  to  loading  bsink. 

Pick  up  value  and  store  into  loading  address. 

Restore  indirect  bank  setting. 

Increase  loading  address  by  one. 

Read  one  frame  of  paper  tape. 

If  character  is  carriage  return,  set  switch  to  con¬ 
vert  address  euid  bank  number.  Otherwise  go  to  CQNV. 

If  character  was  CR,  space  one  frame  and  get  the 
following  character. 

If  character  is  not  zero,  go  to  IC2. 

Set  up  a  "set  indirect  bank"  instruction  with  the 
specified  loading  bank  number  and  go  to  CONV. 

Convert  character  if  it  is  1,  2  or  3  and  go  to  ICl. 
Otherwise  do  an  ERR  halt. 

Get  converted  number  and  set  up  as  loading  address. 

Go  back  to  INCON. 

Save  converted  number  as  if  it  were  a  correction. 

If  switch  set  to  convert  address,  go  to  ASETl. 
Otherwise  go  to  ASETl. 
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Area 

COKV 

CONVA 


NUM 


CONC 

AA 

VALUMTIQN  aXST 


Operation 

Initialize  to  convert  4  characters. 

Read  one  f raise. 

If  77,  go  to  CONVA. 

If  04,  Halt. 

If  34,  Halt. 

Otherwise  go  to  AA. 

Save  converted  number. 

If  this  Is  the  fourth  character,  go  to  CONC. 
Accumulate  with  previous  numbers  and  go  to  CONVA. 

Get  final  digit,  go  to  IHC0H3. 

Convert  character  If  0  thru  7  and  go  to  NUM. 
Otherwise  do  ERR  halt. 


Several  Input  tapes  were  read  by  the  program  and  then  the  contents  of  the 
specified  addresses  were  examined. 

Representative  tapes  are  shown  below: 


Tape  1. 

30001 

nil 

2222 

3333 

4444 

5555 

30006 

6666 

7777 

0000 

7700 

0077 

Tape  2. 

10000 

nil 

pppp 

3333 

20000 

4444 

5555 

6666 

30001 

7777 

0003 

3335 

00002 

2223 

5555 

6666 

5555 

3322 

1122 

3344 

5566 

7711 

Tape  3. 

17776 

1234 

27657 

1234 

5670 

1221 

33566 

7700 

0077 
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